inherited FrmGer_SADIG: TFrmGer_SADIG
  Left = 239
  Top = 150
  Caption = 'Gera'#231#227'o de Arquivos para o SADIG'
  ClientHeight = 304
  ClientWidth = 539
  OldCreateOrder = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Width = 539
    Height = 131
    object Label2: TLabel
      Left = 16
      Top = 69
      Width = 43
      Height = 14
      Caption = 'Arquivo'
    end
    object BtnInsereCFiscal: TSpeedButton
      Left = 8
      Top = 216
      Width = 25
      Height = 18
      Hint = 'Insere um novo hist'#243'rico na lista.'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
        FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
        00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
        F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
        00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
        F033777777777337F73309999990FFF0033377777777FFF77333099999000000
        3333777777777777333333399033333333333337773333333333333903333333
        3333333773333333333333303333333333333337333333333333}
      Layout = blGlyphRight
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      Visible = False
      OnClick = BtnInsereCFiscalClick
    end
    object Label11: TLabel
      Left = 39
      Top = 219
      Width = 164
      Height = 14
      Caption = 'Relacionar os C'#243'digos Fiscais'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      Visible = False
    end
    object pb1: TGauge
      Left = 272
      Top = 61
      Width = 250
      Height = 18
      Progress = 0
    end
    object pb2: TGauge
      Left = 272
      Top = 82
      Width = 250
      Height = 18
      Progress = 0
    end
    object GroupBox1: TGroupBox
      Left = 8
      Top = 3
      Width = 521
      Height = 50
      Caption = 'Per'#237'odo '
      TabOrder = 0
      object Label1: TLabel
        Left = 256
        Top = 19
        Width = 6
        Height = 14
        Caption = 'a'
      end
      object ed_DataIni: TDateEdit
        Left = 128
        Top = 16
        Width = 121
        Height = 21
        NumGlyphs = 2
        TabOrder = 0
      end
      object ed_DataFim: TDateEdit
        Left = 272
        Top = 16
        Width = 121
        Height = 21
        NumGlyphs = 2
        TabOrder = 1
      end
    end
    object cmbxArquivo: TComboBox
      Left = 64
      Top = 68
      Width = 193
      Height = 22
      BevelKind = bkFlat
      Style = csOwnerDrawFixed
      Ctl3D = False
      ItemHeight = 16
      ItemIndex = 0
      ParentCtl3D = False
      TabOrder = 1
      Text = 'Faturamento Di'#225'rio'
      Items.Strings = (
        'Faturamento Di'#225'rio'
        'Carteira de Pedidos'
        'Objetivo de Vendas'
        'Compras Realizadas'
        'Carteira de Pedidos de Compras'
        'Contas a Receber')
    end
    object edTp_Arq: TRadioGroup
      Left = 199
      Top = 206
      Width = 185
      Height = 46
      Caption = 'Tipo de arquivo '
      ItemIndex = 1
      Items.Strings = (
        'Texto (.txt)'
        'Excel (.csv)')
      TabOrder = 3
      Visible = False
    end
    object ListaCFiscal: TCheckListBox
      Left = 8
      Top = 240
      Width = 520
      Height = 82
      BevelKind = bkFlat
      BorderStyle = bsNone
      Font.Charset = ANSI_CHARSET
      Font.Color = clMaroon
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 12
      ParentFont = False
      TabOrder = 5
      Visible = False
      OnKeyDown = ListaCFiscalKeyDown
    end
    object pnlCF: TPanel
      Left = 37
      Top = 310
      Width = 449
      Height = 213
      BevelInner = bvLowered
      BorderWidth = 1
      Color = clGray
      TabOrder = 4
      Visible = False
      object Label8: TLabel
        Left = 8
        Top = 12
        Width = 123
        Height = 19
        Caption = 'C'#243'digos Fiscais'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -16
        Font.Name = 'Arial'
        Font.Style = [fsBold, fsUnderline]
        ParentFont = False
      end
      object dbgrdCF: TDBGrid
        Left = 3
        Top = 39
        Width = 443
        Height = 171
        Align = alBottom
        DataSource = dtsrc
        Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'Arial'
        TitleFont.Style = [fsBold]
        OnDblClick = dbgrdCFDblClick
        OnKeyDown = dbgrdCFKeyDown
        Columns = <
          item
            Expanded = False
            FieldName = 'Cod'
            Title.Caption = 'C'#243'digo'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Descr'
            Title.Caption = 'Descri'#231#227'o'
            Width = 333
            Visible = True
          end>
      end
      object grpBusca: TGroupBox
        Left = 8
        Top = 144
        Width = 433
        Height = 57
        Caption = ' Informe a Descri'#231#227'o '
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        Visible = False
        object Label9: TLabel
          Left = 200
          Top = 40
          Width = 229
          Height = 14
          Caption = ' Tecle <F5> p/ localizar por C'#243'd. ou Descr. '
          Font.Charset = ANSI_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object edNome: TEdit
          Left = 8
          Top = 16
          Width = 417
          Height = 22
          CharCase = ecUpperCase
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 0
          OnKeyDown = edNomeKeyDown
        end
      end
      object Panel6: TPanel
        Left = 227
        Top = 44
        Width = 185
        Height = 14
        Alignment = taRightJustify
        BevelOuter = bvNone
        Caption = '<F2> p/ localizar'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
      end
      object BitBtn1: TBitBtn
        Left = 364
        Top = 10
        Width = 75
        Height = 25
        Caption = '&Fechar'
        TabOrder = 3
        OnClick = BitBtn1Click
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00377777777788
          F8F878F7777777777333333F00004444400777FFF444447777777777F333FF7F
          000033334D5008FFF4333377777777773337777F0000333345D50FFFF4333333
          337F777F3337F33F000033334D5D0FFFF43333333377877F3337F33F00003333
          45D50FEFE4333333337F787F3337F33F000033334D5D0FFFF43333333377877F
          3337F33F0000333345D50FEFE4333333337F787F3337F33F000033334D5D0FFF
          F43333333377877F3337F33F0000333345D50FEFE4333333337F787F3337F33F
          000033334D5D0EFEF43333333377877F3337F33F0000333345D50FEFE4333333
          337F787F3337F33F000033334D5D0EFEF43333333377877F3337F33F00003333
          4444444444333333337F7F7FFFF7F33F00003333333333333333333333777777
          7777333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
          333333333333777777F3333F00003333330000003333333333337FFFF7F3333F
          0000}
        NumGlyphs = 2
      end
    end
    object ckCodRef: TCheckBox
      Left = 16
      Top = 110
      Width = 161
      Height = 17
      Caption = 'Exportar por C'#243'd. Ref.'
      TabOrder = 2
    end
  end
  inherited Panel2: TPanel
    Top = 237
    Width = 539
    inherited bimprimir: TFlatButton
      Enabled = True
      OnClick = bimprimirClick
    end
  end
  inherited sb: TStatusBar
    Top = 285
    Width = 539
  end
  inherited Panel3: TPanel
    Width = 539
  end
  object dtsrc: TDataSource
    DataSet = CDS
    Left = 16
    Top = 76
  end
  object CDS: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 52
    Top = 76
    object CDSCod: TStringField
      FieldName = 'Cod'
      Size = 10
    end
    object CDSDescr: TStringField
      FieldName = 'Descr'
      Size = 40
    end
  end
  object FAT: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 168
    Top = 32
    object FATx01: TStringField
      FieldName = 'x01'
      Size = 8
    end
    object FATx02: TStringField
      FieldName = 'x02'
      Size = 4
    end
    object FATx03: TStringField
      FieldName = 'x03'
      Size = 2
    end
    object FATx04: TStringField
      FieldName = 'x04'
      Size = 2
    end
    object FATx05: TStringField
      FieldName = 'x05'
      Size = 10
    end
    object FATx06: TStringField
      FieldName = 'x06'
    end
    object FATx07: TStringField
      FieldName = 'x07'
    end
    object FATx08: TStringField
      FieldName = 'x08'
      Size = 30
    end
    object FATx09: TStringField
      FieldName = 'x09'
      Size = 53
    end
    object FATx10: TStringField
      FieldName = 'x10'
    end
    object FATx11: TStringField
      FieldName = 'x11'
      Size = 2
    end
    object FATx12: TStringField
      FieldName = 'x12'
      Size = 25
    end
    object FATx13: TStringField
      FieldName = 'x13'
      Size = 40
    end
    object FATx14: TStringField
      FieldName = 'x14'
      Size = 40
    end
    object FATx15: TStringField
      FieldName = 'x15'
      Size = 8
    end
    object FATx16: TStringField
      FieldName = 'x16'
      Size = 8
    end
    object FATx17: TStringField
      FieldName = 'x17'
      Size = 46
    end
    object FATx18: TStringField
      FieldName = 'x18'
      Size = 46
    end
    object FATx19: TStringField
      FieldName = 'x19'
      Size = 26
    end
    object FATx20: TStringField
      FieldName = 'x20'
    end
    object FATx21: TStringField
      FieldName = 'x21'
      Size = 50
    end
    object FATx22: TStringField
      FieldName = 'x22'
      Size = 1
    end
    object FATx23: TStringField
      FieldName = 'x23'
    end
    object FATx24: TStringField
      FieldName = 'x24'
      Size = 4
    end
    object FATx25: TStringField
      FieldName = 'x25'
      Size = 1
    end
    object FATx26: TStringField
      FieldName = 'x26'
      Size = 13
    end
    object FATx27: TStringField
      FieldName = 'x27'
      Size = 9
    end
    object FATx28: TStringField
      FieldName = 'x28'
      Size = 50
    end
    object FATx29: TStringField
      FieldName = 'x29'
      Size = 8
    end
    object FATx30: TStringField
      FieldName = 'x30'
      Size = 4
    end
    object FATx31: TStringField
      FieldName = 'x31'
      Size = 2
    end
    object FATx32: TStringField
      FieldName = 'x32'
      Size = 2
    end
    object FATx33: TStringField
      FieldName = 'x33'
      Size = 10
    end
    object FATx34: TStringField
      FieldName = 'x34'
      Size = 53
    end
    object FAT_1: TStringField
      FieldName = '_1'
      Size = 13
    end
    object FAT_2: TStringField
      FieldName = '_2'
      Size = 13
    end
    object FAT_3: TStringField
      FieldName = '_3'
      Size = 13
    end
    object FAT_4: TStringField
      FieldName = '_4'
      Size = 10
    end
    object FAT_5: TStringField
      FieldName = '_5'
      Size = 13
    end
    object FAT_6: TStringField
      FieldName = '_6'
      Size = 13
    end
    object FAT_7: TStringField
      FieldName = '_7'
      Size = 13
    end
    object FAT_8: TFloatField
      FieldName = '_8'
    end
    object FATPM: TIntegerField
      FieldName = 'PM'
    end
    object FATDias: TIntegerField
      FieldName = 'Dias'
    end
    object FATRef: TStringField
      FieldName = 'Ref'
    end
    object FATIte: TStringField
      FieldName = 'Ite'
    end
  end
  object CAR: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 200
    Top = 32
    object CARx01: TStringField
      FieldName = 'x01'
      Size = 8
    end
    object CARx02: TStringField
      FieldName = 'x02'
      Size = 4
    end
    object CARx03: TStringField
      FieldName = 'x03'
      Size = 2
    end
    object CARx04: TStringField
      FieldName = 'x04'
      Size = 2
    end
    object CARx05: TStringField
      FieldName = 'x05'
      Size = 10
    end
    object CARx06: TStringField
      FieldName = 'x06'
      Size = 8
    end
    object CARx07: TStringField
      FieldName = 'x07'
      Size = 4
    end
    object CARx08: TStringField
      FieldName = 'x08'
      Size = 2
    end
    object CARx09: TStringField
      FieldName = 'x09'
      Size = 2
    end
    object CARx10: TStringField
      FieldName = 'x10'
      Size = 10
    end
    object CARx11: TStringField
      FieldName = 'x11'
    end
    object CARx12: TStringField
      FieldName = 'x12'
    end
    object CARx13: TStringField
      FieldName = 'x13'
      Size = 30
    end
    object CARx14: TStringField
      FieldName = 'x14'
      Size = 53
    end
    object CARx15: TStringField
      FieldName = 'x15'
    end
    object CARx16: TStringField
      FieldName = 'x16'
      Size = 2
    end
    object CARx17: TStringField
      FieldName = 'x17'
      Size = 25
    end
    object CARx18: TStringField
      FieldName = 'x18'
      Size = 40
    end
    object CARx19: TStringField
      FieldName = 'x19'
      Size = 40
    end
    object CARx20: TStringField
      FieldName = 'x20'
      Size = 8
    end
    object CARx21: TStringField
      FieldName = 'x21'
      Size = 8
    end
    object CARx22: TStringField
      FieldName = 'x22'
      Size = 46
    end
    object CARx23: TStringField
      FieldName = 'x23'
      Size = 46
    end
    object CARx24: TStringField
      FieldName = 'x24'
      Size = 26
    end
    object CARx25: TStringField
      FieldName = 'x25'
    end
    object CARx26: TStringField
      FieldName = 'x26'
      Size = 50
    end
    object CARx27: TStringField
      FieldName = 'x27'
      Size = 1
    end
    object CARx28: TStringField
      FieldName = 'x28'
    end
    object CARx29: TStringField
      FieldName = 'x29'
      Size = 9
    end
    object CARx30: TStringField
      FieldName = 'x30'
      Size = 1
    end
    object CARx31: TStringField
      FieldName = 'x31'
      Size = 53
    end
    object CAR_1: TStringField
      FieldName = '_1'
      Size = 13
    end
    object CAR_2: TStringField
      FieldName = '_2'
      Size = 13
    end
    object CAR_3: TStringField
      FieldName = '_3'
      Size = 13
    end
    object CAR_4: TStringField
      FieldName = '_4'
      Size = 10
    end
    object CAR_5: TStringField
      FieldName = '_5'
      Size = 13
    end
    object CAR_6: TStringField
      FieldName = '_6'
      Size = 13
    end
    object CAR_7: TStringField
      FieldName = '_7'
      Size = 13
    end
    object CAR_8: TFloatField
      FieldName = '_8'
    end
    object CARPM: TIntegerField
      FieldName = 'PM'
    end
    object CARDias: TIntegerField
      FieldName = 'Dias'
    end
    object CARRef: TStringField
      FieldName = 'Ref'
    end
    object CARIte: TStringField
      FieldName = 'Ite'
    end
  end
end
